home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
DJGPP
/
DJLSR111.ZIP
/
libsrc
/
c
/
io
/
fputs.c
< prev
next >
Wrap
C/C++ Source or Header
|
1993-06-28
|
1KB
|
48 lines
/* This is file FPUTS.C */
/* This file may have been modified by DJ Delorie (Jan 1991). If so,
** these modifications are Coyright (C) 1993 DJ Delorie, 24 Kirsten Ave,
** Rochester NH, 03867-2954, USA.
*/
/*
* Copyright (c) 1984 Regents of the University of California.
* All rights reserved. The Berkeley software License Agreement
* specifies the terms and conditions for redistribution.
*/
#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid[] = "@(#)fputs.c 5.2 (Berkeley) 3/9/86";
#endif LIBC_SCCS and not lint
#include <stdio.h>
fputs(s, iop)
register const char *s;
register FILE *iop;
{
register r = 0;
register c;
int unbuffered;
char localbuf[BUFSIZ];
unbuffered = iop->_flag & _IONBF;
if (unbuffered) {
iop->_flag &= ~_IONBF;
iop->_ptr = iop->_base = localbuf;
iop->_bufsiz = BUFSIZ;
}
while (c = *s++)
r = putc(c, iop);
if (unbuffered) {
fflush(iop);
iop->_flag |= _IONBF;
iop->_base = NULL;
iop->_bufsiz = NULL;
iop->_cnt = 0;
}
return(r);
}